home *** CD-ROM | disk | FTP | other *** search
- startrecord=true
- label=
- nodetype=7
- filename=avm:rexx/stdhead.avm
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=parse arg servername mailbox .
- line2=if symbol('mailbox') ~= 'VAR' | mailbox = '' then mailbox = 'manual'
- line3=options failat 50
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=5
- mode=3
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1='turnoffvoicemode'
- line2=
- line3=
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=6
- mode=0
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=9
- baud=4
- bits=1
- parity=0
- stopbits=0
- handshaking=1
- erroractiontype=3
- erroractionaction=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=address rexx_gpfax 'listen'
- line2=address rexx_gpfax 'recfax'
- line3=faxresult = rc
- line4=address rexx_gpfax 'unlisten'
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=16
- timeout=2
- abortactiontype=0
- abortactionaction=stdabort
- erroractiontype=0
- erroractionaction=stderror
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=11
- line1=AT+FCLASS=0
- timeout=10
- swallowecho=1
- timedoutactiontype=0
- timedoutactionaction=stdtimedout
- abortactiontype=0
- abortactionaction=stdabort
- erroractiontype=0
- erroractionaction=stderror
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=10
- timeout=2
- valueactiontype=3
- valueactionaction=
- timedoutactiontype=3
- timedoutactionaction=
- abortactiontype=0
- abortactionaction=stdabort
- erroractiontype=0
- erroractionaction=stderror
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=10
- timeout=2
- valueactiontype=3
- valueactionaction=
- timedoutactiontype=3
- timedoutactionaction=
- abortactiontype=0
- abortactionaction=stdabort
- erroractiontype=0
- erroractionaction=stderror
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=handle = makeUniqueFile()
- line2=call initLogEntry()
- line3=
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=log.comment = 'Fax attempted.'
- line2=log.type = 'unknown'
- line3=if faxresult <= 5 then signal gotfax
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=0
- nextactionaction=finished
- endrecord=true
- startrecord=true
- label=gotfax
- nodetype=8
- line1=address rexx_gpfax 'reportlog' 1
- line2=faxfiles = result || '#?'
- line3=slashpos = lastpos('/', result)
- line4=if slashpos = 0 then log.filename = result
- line5=else log.filename = right(result, length(result) - slashpos)
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=address command 'copy >nil: <nil: quiet' faxfiles voiceFile(mailbox, '')
- line2=address rexx_gpfax 'reportlog' 6
- line3=log.length = result
- line4=address rexx_gpfax 'reportlog' 2
- line5=log.comment = result 'page(s) received.'
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=
- nodetype=8
- line1=address rexx_gpfax 'reportlog' 4
- line2=log.returnnumber = result
- line3=log.type = 'fax'
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=3
- nextactionaction=
- endrecord=true
- startrecord=true
- label=finished
- nodetype=8
- line1=call saveLogEntry(mailbox, handle)
- line2=
- line3=
- line4=
- line5=
- line6=
- line7=
- line8=
- line9=
- line10=
- nextactiontype=2
- nextactionaction=exit
- endrecord=true
- startrecord=true
- label=
- nodetype=7
- filename=avm:rexx/simplestdtail.avm
- nextactiontype=3
- nextactionaction=
- endrecord=true
-